home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 49 / Amiga Format CD49 (2000-01-17)(Future Publishing)(GB)(Track 1 of 3)[!][issue 2000-02].iso / -serious- / misc / charmap / install_english < prev    next >
Text File  |  1999-11-30  |  3KB  |  93 lines
  1. ; $VER:Installation script for CharMap
  2. ; Author: Adapted from Michael Link's script
  3. ; Begin       : 19/11/99
  4.  
  5. (set DIRHELP (cat "You must enter the name of the directory, in which\n"
  6.           "CharMap shall be installed.\n\n"
  7.           "If you want CharMap to be active everytime you\n"
  8.           "start the computer, enter the directory\n"
  9.           "\"SYS:WBStartup\", which is the default directory.\n"
  10.           "You can enter \"SYS:Tools/Commodities\", if you want to\n"
  11.           "use it just sometimes or start it from user-startup.\n"
  12.          )
  13. )
  14.  
  15. (set DIR_REQUEST (cat "Please enter the destination directory for CharMap")
  16. )
  17.  
  18. (set WHICH_HOTKEY (cat "\n\nWith which key combination shall the\n"
  19.                        "window be reopen when it is hiden ?"
  20.           )
  21. )
  22.  
  23.  
  24. (set vernum (getversion "locale.library" (resident)))
  25. (set ver (shiftright vernum 16))
  26.  
  27.  
  28. ; ***********************************************************************
  29. ; *                                                                     *
  30. ; * Request for the destination directory                               *
  31. ; *                                                                     *
  32. ; ***********************************************************************
  33.  
  34. (set DIR (askdir (prompt DIR_REQUEST)
  35.                  (help DIRHELP)
  36.                  (default "SYS:WBStartup")
  37.          )
  38. )
  39.  
  40. (set @default-dest DIR)
  41.  
  42.  
  43. ; ***********************************************************************
  44. ; *                                                                     *
  45. ; * Asking for the tool-types                                           *
  46. ; *                                                                     *
  47. ; ***********************************************************************
  48.  
  49. (set HOTKEY (askstring    (prompt WHICH_HOTKEY)
  50.             (help @askstring-help)
  51.             (default "ctrl lalt c")
  52.         )
  53. )
  54.  
  55. (tooltype (prompt "Writing tool-type HOTKEY ...")
  56.           (help)
  57.           (dest "charmap")
  58.           (settooltype "HOTKEY" HOTKEY)
  59. )
  60.  
  61. (copyfiles (prompt ("Copying CharMap to %s" DIR) )
  62.            (help @copyfiles-help)
  63.            (source "charmap")
  64.            (dest DIR)
  65.            (infos)
  66. )
  67.  
  68.  
  69. ; ***********************************************************************
  70. ; *                                                                     *
  71. ; * Installation of the catalogs                                        *
  72. ; *                                                                     *
  73. ; ***********************************************************************
  74.  
  75. (if (>= ver 38)
  76.     (
  77.         (set CATALOGS (askoptions (prompt (cat "\nWhich language catalogs\n"
  78.                                                "shall be installed ? (in LOCALE:)\n"))
  79.                                   (help)
  80.                                   (choices "Français")
  81.                                   (default 1)
  82.                       )
  83.         )
  84.         (if (BITAND CATALOGS 1)
  85.             (copyfiles (prompt "Copying French catalog ...")
  86.                        (help)
  87.                        (source "catalogs/français/CharMap.catalog")
  88.                        (dest   "LOCALE:Catalogs/français")
  89.             )
  90.         )
  91.     )
  92. )
  93.